Do not distribute the stripped version of this file. The checksum in the header refers to the documented version.

pspicture.stytpspicture.docpssty,dvips texpicture.stytpspicture.doctexsty =! End of pspicture.ps pspicture.pstpspicture.docps a@ a@
This is NOT the usual way to access this style. It is intended as a style option:
`t=12`p=12 arrowlength

warningtexpicture.sty in operation: spaces LaTeX document with pspicture.sty before printing @v@lifnextchar[@@v@l@v@l /!BP 72 72.27 div dup scale def /!A newpath 0 0 moveto dup neg dup .4 mul rlineto .8 mul 0 exch rlineto closepath fill def /!V !BP /!X exch def /!y exch def /!x exch def newpath 0 0 moveto !x 0 eq 0 !y 0 lt !X neg!X ifelse !x 0 lt !X neg!Xifelse !X !y mul !x abs div ifelse lineto setlinewidth currentpoint stroke translate !y !x atan rotate !A def /!L !BP /!X exch def /!y exch def /!x exch def newpath 0 0 moveto !x 0 eq 0 !y 0 lt !X neg!X ifelse !x 0 lt !X neg!Xifelse !X !y mul !x abs div ifelse lineto setlinewidth stroke def /!C !BP 0 0 3 2 roll 2 div 0 360 arc setlinewidth stroke def /!D !BP 0 0 3 2 roll 2 div 0 360 arc fill def /!O !BP /!y exch 2 div def /!x exch 2 div def /!r exch !x !y 2 copy gt exch if pop 2 copy gt exch if pop def setlinewidth 1 eq newpath !x neg 0 moveto !x neg !y 0 !y !r arcto 4 pop repeat 0 !y lineto strokeif 1 eq newpath !x 0 moveto !x !y 0 !y !r arcto 4 pop repeat 0 !y lineto strokeif 1 eq newpath !x neg 0 moveto !x neg !y neg 0 !y neg !r arcto 4 pop repeat 0 !y neg lineto strokeif 1 eq newpath !x 0 moveto !x !y neg 0 !y neg !r arcto 4 pop repeat 0 !y neg lineto strokeif def /!V2 !BP 2 copy exch atan /a exch def 2 copy newpath 0 0 moveto lineto 3 2 roll setlinewidth stroke translate a rotate !A def /!L2 !BP newpath 0 0 moveto lineto setlinewidth stroke def /!C2 !BP /!s exch def /!y exch def /!x exch def newpath 0 0 moveto 0 0 !x 2 div !y 10 div !s mul add !y 2 div !x 10 div !s mul sub !x !y curveto setlinewidth stroke def;''